home *** CD-ROM | disk | FTP | other *** search
/ System Booster / System Booster.iso / Archives / Converters / EpsLab_1_02.lha / EpsLab / English / Install < prev    next >
Encoding:
Text File  |  1994-11-17  |  3.1 KB  |  171 lines
  1. ; Installation program for the Commodore's Installer utility
  2.  
  3. (complete 0)
  4.  
  5. (set name
  6.     (askdir
  7.         (prompt "Where do you want to install EpsLab ?\n(a drawer named EpsLab \
  8. will be created if it doesn't exists)")
  9.         (help @askdir-help)
  10.         (default "")
  11.     )
  12. )
  13.  
  14. (set name (tackon name "EpsLab"))
  15.  
  16. (if (NOT (exists name))
  17.     (makedir name
  18.             (infos)
  19.     )
  20. )
  21.  
  22. (set @default-dest name)
  23.  
  24. (if (exists (tackon name "EpsLab.info"))
  25.     (message (cat "Warning: tooltypes from the old version will be "
  26.                 "lost: remember to save them before you proceed.")
  27.     )
  28. )
  29.  
  30. (set vernum (/ (getversion) 65536))   ; se version >37: c'รจ localizzazione
  31.  
  32. (if (> vernum 37)
  33.     (set local
  34.         (askbool
  35.             (prompt "Do you want to install the support file for the italian language ?")
  36.             (help local-help)
  37.             (default 0)
  38.         )
  39.     )
  40.     (set local 0)
  41. )
  42.  
  43. (if local
  44.     (if (and (= @user-level 2) (exists "LOCALE:catalogs/italiano"))
  45.         (set sysdest
  46.             (askchoice
  47.                 (prompt "Where do you want to install the localization file ?")
  48.                 (help @askchoice-help)
  49.                 (choices "in the same drawer as EpsLab" "in LOCALE:")
  50.                 (default 1)
  51.             )
  52.         )
  53.     )
  54. )
  55.  
  56. (if (not (exists "LOCALE:catalogs/italiano"))
  57.     (set sysdest 0)
  58. )
  59.  
  60. (complete 25)
  61.  
  62. (set maincpu (database "cpu"))
  63.  
  64. ;(if (AND (<> maincpu "68000") (<> maincpu "68010"))
  65. ;    (set fpu
  66. ;        (askchoice
  67. ;            (prompt "Do you have a math coprocessor installed ?")
  68. ;            (help @askchoice-help)
  69. ;            (choices "Yes" "No" "I don't know")
  70. ;            (default 0)
  71. ;        )
  72. ;    )
  73. ;
  74.     (set fpu 1)
  75. ;)
  76.  
  77. (if (<> fpu 0)
  78.     (copylib
  79.         (source "/Libs/post.library")
  80.         (dest "LIBS:")
  81.         (confirm)
  82.         (prompt "About to install 'post.library'")
  83.         (help "If you want to EpsLab to render full preview images instead of \
  84. crossboxes, you should install post.library")
  85.     )
  86.  
  87.     (copylib
  88.         (source "/Libs/post.library.2620")
  89.         (dest "LIBS:")
  90.         (newname "post.library")
  91.         (confirm)
  92.         (prompt "About to install 'post.library' (FPU version)")
  93.         (help "If you want to EpsLab to render full preview images instead of \
  94. crossboxes, you should install post.library")
  95.     )
  96. )    
  97.  
  98. (complete 50)
  99.  
  100. (if (exists "LIBS:post.library")
  101.     (
  102.      (if (not (exists "PSFONTS:" (noreq)))
  103.         (
  104.          (set psf 
  105.             (askdir
  106.                 (prompt "You need a drawer to store PostScript fonts\n(no new \
  107. drawers will be created)")
  108.                 (help @askdir-help)
  109.                 (default "sys:")
  110.             )
  111.          )
  112.          (startup "EpsLab"
  113.             (command (cat "assign PSFONTS: " psf))
  114.             (prompt "An assign needs to be added to your User-Startup.")
  115.             (help @startup-help)
  116.          )
  117.          (makeassign "PSFONTS" psf)
  118.         )
  119.      )
  120.      (copyfiles
  121.             (source "/PS/FunkyFont")
  122.             (dest "PSFONTS:")
  123.             (optional nofail)
  124.      )
  125.      (copyfiles
  126.             (source "/PS/afms/FunkyFont.afm")
  127.             (dest "PSFONTS:afms")
  128.             (optional nofail)
  129.      )
  130.     )
  131. )
  132.  
  133. (complete 75)
  134.  
  135. (copyfiles
  136.     (infos)
  137.     (source "/EpsLab")
  138.     (dest name)
  139. )
  140.  
  141. (copyfiles
  142.     (source "/PS/init.ps")
  143.     (dest name)
  144. )
  145.  
  146. (tooltype
  147.     (dest (tackon name "EpsLab"))
  148.     (noposition)
  149. )
  150.  
  151. (complete 90)
  152.  
  153. (if local
  154.      (if sysdest
  155.         (copyfiles
  156.             (source "/catalogs/italiano/EpsLab.catalog")
  157.             (dest "LOCALE:catalogs/italiano")
  158.         )
  159.         (
  160.             (makedir (tackon name "catalogs"))
  161.             (copyfiles
  162.                 (source "/catalogs/italiano/EpsLab.catalog")
  163.                 (dest (tackon name "catalogs/italiano"))
  164.             )
  165.         )
  166.     )
  167. )
  168.  
  169. (complete 100)
  170.  
  171.